home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 7 / FM Towns Free Software Collection 7.iso / t_os / gpen32k / source.exe / LIB / OSRC / GTH.C < prev    next >
C/C++ Source or Header  |  1993-08-09  |  640b  |  32 lines
  1. /*
  2.     複数画面退避サブルーチン
  3. */
  4.  
  5. #include    <Normlib.h>
  6. #include    <okome.h>
  7.  
  8. void OKM_gth(int x1, int y1, int x2, int y2, int f)
  9. {
  10.     static int yz=0;
  11.     int i, j, k;
  12.     char w[1152];
  13.     k = 1152 / (x2-x1+1);
  14.     j = (((x2-x1+1)*k+383)/384);
  15.     if (f)
  16.     {                /*    1:退避    */
  17.         for ( i = 0; i <= (y2-y1+k-1)/k; i++ )
  18.         {
  19.             egbget( x1, y1+i*k, x2, y1+(i+1)*k-1, w );
  20.             egbput( 640, yz+j*i, 1023, yz+j*(i+1)-1, w );
  21.         }
  22.         yz+=(y2-y1+1)*j;
  23.     }    else    {    /*    0:復元    */
  24.         yz-=(y2-y1+1)*j;
  25.         for ( i = 0; i <= (y2-y1+k-1)/k; i++ )
  26.         {
  27.             egbget( 640, yz+j*i, 1023, yz+j*(i+1)-1, w );
  28.             egbput( x1, y1+i*k, x2, y1+(i+1)*k-1, w );
  29.         }
  30.     }
  31. }
  32.